home *** CD-ROM | disk | FTP | other *** search
- ------------------------------------------------------------------------
- -- max.decTest -- decimal maximum --
- -- Copyright (c) IBM Corporation, 1981, 2004. All rights reserved. --
- ------------------------------------------------------------------------
- -- Please see the document "General Decimal Arithmetic Testcases" --
- -- at http://www2.hursley.ibm.com/decimal for the description of --
- -- these testcases. --
- -- --
- -- These testcases are experimental ('beta' versions), and they --
- -- may contain errors. They are offered on an as-is basis. In --
- -- particular, achieving the same results as the tests here is not --
- -- a guarantee that an implementation complies with any Standard --
- -- or specification. The tests are not exhaustive. --
- -- --
- -- Please send comments, suggestions, and corrections to the author: --
- -- Mike Cowlishaw, IBM Fellow --
- -- IBM UK, PO Box 31, Birmingham Road, Warwick CV34 5JL, UK --
- -- mfc@uk.ibm.com --
- ------------------------------------------------------------------------
- version: 2.39
-
- -- we assume that base comparison is tested in compare.decTest, so
- -- these mainly cover special cases and rounding
-
- extended: 1
- precision: 9
- rounding: half_up
- maxExponent: 384
- minexponent: -383
-
- -- sanity checks
- maxx001 max -2 -2 -> -2
- maxx002 max -2 -1 -> -1
- maxx003 max -2 0 -> 0
- maxx004 max -2 1 -> 1
- maxx005 max -2 2 -> 2
- maxx006 max -1 -2 -> -1
- maxx007 max -1 -1 -> -1
- maxx008 max -1 0 -> 0
- maxx009 max -1 1 -> 1
- maxx010 max -1 2 -> 2
- maxx011 max 0 -2 -> 0
- maxx012 max 0 -1 -> 0
- maxx013 max 0 0 -> 0
- maxx014 max 0 1 -> 1
- maxx015 max 0 2 -> 2
- maxx016 max 1 -2 -> 1
- maxx017 max 1 -1 -> 1
- maxx018 max 1 0 -> 1
- maxx019 max 1 1 -> 1
- maxx020 max 1 2 -> 2
- maxx021 max 2 -2 -> 2
- maxx022 max 2 -1 -> 2
- maxx023 max 2 0 -> 2
- maxx025 max 2 1 -> 2
- maxx026 max 2 2 -> 2
-
- -- extended zeros
- maxx030 max 0 0 -> 0
- maxx031 max 0 -0 -> 0
- maxx032 max 0 -0.0 -> 0
- maxx033 max 0 0.0 -> 0
- maxx034 max -0 0 -> 0 -- note: -0 = 0, but 0 chosen
- maxx035 max -0 -0 -> -0
- maxx036 max -0 -0.0 -> -0.0
- maxx037 max -0 0.0 -> 0.0
- maxx038 max 0.0 0 -> 0
- maxx039 max 0.0 -0 -> 0.0
- maxx040 max 0.0 -0.0 -> 0.0
- maxx041 max 0.0 0.0 -> 0.0
- maxx042 max -0.0 0 -> 0
- maxx043 max -0.0 -0 -> -0.0
- maxx044 max -0.0 -0.0 -> -0.0
- maxx045 max -0.0 0.0 -> 0.0
-
- maxx050 max -0E1 0E1 -> 0E+1
- maxx051 max -0E2 0E2 -> 0E+2
- maxx052 max -0E2 0E1 -> 0E+1
- maxx053 max -0E1 0E2 -> 0E+2
- maxx054 max 0E1 -0E1 -> 0E+1
- maxx055 max 0E2 -0E2 -> 0E+2
- maxx056 max 0E2 -0E1 -> 0E+2
- maxx057 max 0E1 -0E2 -> 0E+1
-
- maxx058 max 0E1 0E1 -> 0E+1
- maxx059 max 0E2 0E2 -> 0E+2
- maxx060 max 0E2 0E1 -> 0E+2
- maxx061 max 0E1 0E2 -> 0E+2
- maxx062 max -0E1 -0E1 -> -0E+1
- maxx063 max -0E2 -0E2 -> -0E+2
- maxx064 max -0E2 -0E1 -> -0E+1
- maxx065 max -0E1 -0E2 -> -0E+1
-
- -- Specials
- precision: 9
- maxx090 max Inf -Inf -> Infinity
- maxx091 max Inf -1000 -> Infinity
- maxx092 max Inf -1 -> Infinity
- maxx093 max Inf -0 -> Infinity
- maxx094 max Inf 0 -> Infinity
- maxx095 max Inf 1 -> Infinity
- maxx096 max Inf 1000 -> Infinity
- maxx097 max Inf Inf -> Infinity
- maxx098 max -1000 Inf -> Infinity
- maxx099 max -Inf Inf -> Infinity
- maxx100 max -1 Inf -> Infinity
- maxx101 max -0 Inf -> Infinity
- maxx102 max 0 Inf -> Infinity
- maxx103 max 1 Inf -> Infinity
- maxx104 max 1000 Inf -> Infinity
- maxx105 max Inf Inf -> Infinity
-
- maxx120 max -Inf -Inf -> -Infinity
- maxx121 max -Inf -1000 -> -1000
- maxx122 max -Inf -1 -> -1
- maxx123 max -Inf -0 -> -0
- maxx124 max -Inf 0 -> 0
- maxx125 max -Inf 1 -> 1
- maxx126 max -Inf 1000 -> 1000
- maxx127 max -Inf Inf -> Infinity
- maxx128 max -Inf -Inf -> -Infinity
- maxx129 max -1000 -Inf -> -1000
- maxx130 max -1 -Inf -> -1
- maxx131 max -0 -Inf -> -0
- maxx132 max 0 -Inf -> 0
- maxx133 max 1 -Inf -> 1
- maxx134 max 1000 -Inf -> 1000
- maxx135 max Inf -Inf -> Infinity
-
- -- 2004.08.02 754r chooses number over NaN in mixed cases
- maxx141 max NaN -Inf -> -Infinity
- maxx142 max NaN -1000 -> -1000
- maxx143 max NaN -1 -> -1
- maxx144 max NaN -0 -> -0
- maxx145 max NaN 0 -> 0
- maxx146 max NaN 1 -> 1
- maxx147 max NaN 1000 -> 1000
- maxx148 max NaN Inf -> Infinity
- maxx149 max NaN NaN -> NaN
- maxx150 max -Inf NaN -> -Infinity
- maxx151 max -1000 NaN -> -1000
- maxx152 max -1 NaN -> -1
- maxx153 max -0 NaN -> -0
- maxx154 max 0 NaN -> 0
- maxx155 max 1 NaN -> 1
- maxx156 max 1000 NaN -> 1000
- maxx157 max Inf NaN -> Infinity
-
- maxx161 max sNaN -Inf -> NaN Invalid_operation
- maxx162 max sNaN -1000 -> NaN Invalid_operation
- maxx163 max sNaN -1 -> NaN Invalid_operation
- maxx164 max sNaN -0 -> NaN Invalid_operation
- maxx165 max sNaN 0 -> NaN Invalid_operation
- maxx166 max sNaN 1 -> NaN Invalid_operation
- maxx167 max sNaN 1000 -> NaN Invalid_operation
- maxx168 max sNaN NaN -> NaN Invalid_operation
- maxx169 max sNaN sNaN -> NaN Invalid_operation
- maxx170 max NaN sNaN -> NaN Invalid_operation
- maxx171 max -Inf sNaN -> NaN Invalid_operation
- maxx172 max -1000 sNaN -> NaN Invalid_operation
- maxx173 max -1 sNaN -> NaN Invalid_operation
- maxx174 max -0 sNaN -> NaN Invalid_operation
- maxx175 max 0 sNaN -> NaN Invalid_operation
- maxx176 max 1 sNaN -> NaN Invalid_operation
- maxx177 max 1000 sNaN -> NaN Invalid_operation
- maxx178 max Inf sNaN -> NaN Invalid_operation
- maxx179 max NaN sNaN -> NaN Invalid_operation
-
- -- propagating NaNs
- maxx181 max NaN9 -Inf -> -Infinity
- maxx182 max NaN8 9 -> 9
- maxx183 max -NaN7 Inf -> Infinity
-
- maxx184 max -NaN1 NaN11 -> -NaN1
- maxx185 max NaN2 NaN12 -> NaN2
- maxx186 max -NaN13 -NaN7 -> -NaN13
- maxx187 max NaN14 -NaN5 -> NaN14
-
- maxx188 max -Inf NaN4 -> -Infinity
- maxx189 max -9 -NaN3 -> -9
- maxx190 max Inf NaN2 -> Infinity
-
- maxx191 max sNaN99 -Inf -> NaN99 Invalid_operation
- maxx192 max sNaN98 -1 -> NaN98 Invalid_operation
- maxx193 max -sNaN97 NaN -> -NaN97 Invalid_operation
- maxx194 max sNaN96 sNaN94 -> NaN96 Invalid_operation
- maxx195 max NaN95 sNaN93 -> NaN93 Invalid_operation
- maxx196 max -Inf sNaN92 -> NaN92 Invalid_operation
- maxx197 max 0 sNaN91 -> NaN91 Invalid_operation
- maxx198 max Inf -sNaN90 -> -NaN90 Invalid_operation
- maxx199 max NaN sNaN89 -> NaN89 Invalid_operation
-
- -- rounding checks
- maxexponent: 999
- minexponent: -999
- precision: 9
- maxx201 max 12345678000 1 -> 1.23456780E+10 Rounded
- maxx202 max 1 12345678000 -> 1.23456780E+10 Rounded
- maxx203 max 1234567800 1 -> 1.23456780E+9 Rounded
- maxx204 max 1 1234567800 -> 1.23456780E+9 Rounded
- maxx205 max 1234567890 1 -> 1.23456789E+9 Rounded
- maxx206 max 1 1234567890 -> 1.23456789E+9 Rounded
- maxx207 max 1234567891 1 -> 1.23456789E+9 Inexact Rounded
- maxx208 max 1 1234567891 -> 1.23456789E+9 Inexact Rounded
- maxx209 max 12345678901 1 -> 1.23456789E+10 Inexact Rounded
- maxx210 max 1 12345678901 -> 1.23456789E+10 Inexact Rounded
- maxx211 max 1234567896 1 -> 1.23456790E+9 Inexact Rounded
- maxx212 max 1 1234567896 -> 1.23456790E+9 Inexact Rounded
- maxx213 max -1234567891 1 -> 1
- maxx214 max 1 -1234567891 -> 1
- maxx215 max -12345678901 1 -> 1
- maxx216 max 1 -12345678901 -> 1
- maxx217 max -1234567896 1 -> 1
- maxx218 max 1 -1234567896 -> 1
-
- precision: 15
- maxx221 max 12345678000 1 -> 12345678000
- maxx222 max 1 12345678000 -> 12345678000
- maxx223 max 1234567800 1 -> 1234567800
- maxx224 max 1 1234567800 -> 1234567800
- maxx225 max 1234567890 1 -> 1234567890
- maxx226 max 1 1234567890 -> 1234567890
- maxx227 max 1234567891 1 -> 1234567891
- maxx228 max 1 1234567891 -> 1234567891
- maxx229 max 12345678901 1 -> 12345678901
- maxx230 max 1 12345678901 -> 12345678901
- maxx231 max 1234567896 1 -> 1234567896
- maxx232 max 1 1234567896 -> 1234567896
- maxx233 max -1234567891 1 -> 1
- maxx234 max 1 -1234567891 -> 1
- maxx235 max -12345678901 1 -> 1
- maxx236 max 1 -12345678901 -> 1
- maxx237 max -1234567896 1 -> 1
- maxx238 max 1 -1234567896 -> 1
-
- -- from examples
- maxx280 max '3' '2' -> '3'
- maxx281 max '-10' '3' -> '3'
- maxx282 max '1.0' '1' -> '1'
- maxx283 max '1' '1.0' -> '1'
- maxx284 max '7' 'NaN' -> '7'
-
- -- overflow and underflow tests ...
- maxExponent: 999999999
- minexponent: -999999999
- maxx330 max +1.23456789012345E-0 9E+999999999 -> 9E+999999999
- maxx331 max 9E+999999999 +1.23456789012345E-0 -> 9E+999999999
- maxx332 max +0.100 9E-999999999 -> 0.100
- maxx333 max 9E-999999999 +0.100 -> 0.100
- maxx335 max -1.23456789012345E-0 9E+999999999 -> 9E+999999999
- maxx336 max 9E+999999999 -1.23456789012345E-0 -> 9E+999999999
- maxx337 max -0.100 9E-999999999 -> 9E-999999999
- maxx338 max 9E-999999999 -0.100 -> 9E-999999999
-
- maxx339 max 1e-599999999 1e-400000001 -> 1E-400000001
- maxx340 max 1e-599999999 1e-400000000 -> 1E-400000000
- maxx341 max 1e-600000000 1e-400000000 -> 1E-400000000
- maxx342 max 9e-999999998 0.01 -> 0.01
- maxx343 max 9e-999999998 0.1 -> 0.1
- maxx344 max 0.01 9e-999999998 -> 0.01
- maxx345 max 1e599999999 1e400000001 -> 1E+599999999
- maxx346 max 1e599999999 1e400000000 -> 1E+599999999
- maxx347 max 1e600000000 1e400000000 -> 1E+600000000
- maxx348 max 9e999999998 100 -> 9E+999999998
- maxx349 max 9e999999998 10 -> 9E+999999998
- maxx350 max 100 9e999999998 -> 9E+999999998
- -- signs
- maxx351 max 1e+777777777 1e+411111111 -> 1E+777777777
- maxx352 max 1e+777777777 -1e+411111111 -> 1E+777777777
- maxx353 max -1e+777777777 1e+411111111 -> 1E+411111111
- maxx354 max -1e+777777777 -1e+411111111 -> -1E+411111111
- maxx355 max 1e-777777777 1e-411111111 -> 1E-411111111
- maxx356 max 1e-777777777 -1e-411111111 -> 1E-777777777
- maxx357 max -1e-777777777 1e-411111111 -> 1E-411111111
- maxx358 max -1e-777777777 -1e-411111111 -> -1E-777777777
-
- -- expanded list from min/max 754r purple prose
- -- [explicit tests for exponent ordering]
- maxx401 max Inf 1.1 -> Infinity
- maxx402 max 1.1 1 -> 1.1
- maxx403 max 1 1.0 -> 1
- maxx404 max 1.0 0.1 -> 1.0
- maxx405 max 0.1 0.10 -> 0.1
- maxx406 max 0.10 0.100 -> 0.10
- maxx407 max 0.10 0 -> 0.10
- maxx408 max 0 0.0 -> 0
- maxx409 max 0.0 -0 -> 0.0
- maxx410 max 0.0 -0.0 -> 0.0
- maxx411 max 0.00 -0.0 -> 0.00
- maxx412 max 0.0 -0.00 -> 0.0
- maxx413 max 0 -0.0 -> 0
- maxx414 max 0 -0 -> 0
- maxx415 max -0.0 -0 -> -0.0
- maxx416 max -0 -0.100 -> -0
- maxx417 max -0.100 -0.10 -> -0.100
- maxx418 max -0.10 -0.1 -> -0.10
- maxx419 max -0.1 -1.0 -> -0.1
- maxx420 max -1.0 -1 -> -1.0
- maxx421 max -1 -1.1 -> -1
- maxx423 max -1.1 -Inf -> -1.1
- -- same with operands reversed
- maxx431 max 1.1 Inf -> Infinity
- maxx432 max 1 1.1 -> 1.1
- maxx433 max 1.0 1 -> 1
- maxx434 max 0.1 1.0 -> 1.0
- maxx435 max 0.10 0.1 -> 0.1
- maxx436 max 0.100 0.10 -> 0.10
- maxx437 max 0 0.10 -> 0.10
- maxx438 max 0.0 0 -> 0
- maxx439 max -0 0.0 -> 0.0
- maxx440 max -0.0 0.0 -> 0.0
- maxx441 max -0.0 0.00 -> 0.00
- maxx442 max -0.00 0.0 -> 0.0
- maxx443 max -0.0 0 -> 0
- maxx444 max -0 0 -> 0
- maxx445 max -0 -0.0 -> -0.0
- maxx446 max -0.100 -0 -> -0
- maxx447 max -0.10 -0.100 -> -0.100
- maxx448 max -0.1 -0.10 -> -0.10
- maxx449 max -1.0 -0.1 -> -0.1
- maxx450 max -1 -1.0 -> -1.0
- maxx451 max -1.1 -1 -> -1
- maxx453 max -Inf -1.1 -> -1.1
- -- largies
- maxx460 max 1000 1E+3 -> 1E+3
- maxx461 max 1E+3 1000 -> 1E+3
- maxx462 max 1000 -1E+3 -> 1000
- maxx463 max 1E+3 -1000 -> 1E+3
- maxx464 max -1000 1E+3 -> 1E+3
- maxx465 max -1E+3 1000 -> 1000
- maxx466 max -1000 -1E+3 -> -1000
- maxx467 max -1E+3 -1000 -> -1000
-
-
- -- overflow tests
- maxexponent: 999999999
- minexponent: -999999999
- precision: 3
- maxx500 max 9.999E+999999999 0 -> Infinity Inexact Overflow Rounded
- maxx501 max -9.999E+999999999 0 -> 0
-
- -- subnormals and underflow
- precision: 3
- maxexponent: 999
- minexponent: -999
- maxx510 max 1.00E-999 0 -> 1.00E-999
- maxx511 max 0.1E-999 0 -> 1E-1000 Subnormal
- maxx512 max 0.10E-999 0 -> 1.0E-1000 Subnormal
- maxx513 max 0.100E-999 0 -> 1.0E-1000 Subnormal Rounded
- maxx514 max 0.01E-999 0 -> 1E-1001 Subnormal
- -- next is rounded to Emin
- maxx515 max 0.999E-999 0 -> 1.00E-999 Inexact Rounded Subnormal Underflow
- maxx516 max 0.099E-999 0 -> 1.0E-1000 Inexact Rounded Subnormal Underflow
- maxx517 max 0.009E-999 0 -> 1E-1001 Inexact Rounded Subnormal Underflow
- maxx518 max 0.001E-999 0 -> 0E-1001 Inexact Rounded Subnormal Underflow
- maxx519 max 0.0009E-999 0 -> 0E-1001 Inexact Rounded Subnormal Underflow
- maxx520 max 0.0001E-999 0 -> 0E-1001 Inexact Rounded Subnormal Underflow
-
- maxx530 max -1.00E-999 0 -> 0
- maxx531 max -0.1E-999 0 -> 0
- maxx532 max -0.10E-999 0 -> 0
- maxx533 max -0.100E-999 0 -> 0
- maxx534 max -0.01E-999 0 -> 0
- maxx535 max -0.999E-999 0 -> 0
- maxx536 max -0.099E-999 0 -> 0
- maxx537 max -0.009E-999 0 -> 0
- maxx538 max -0.001E-999 0 -> 0
- maxx539 max -0.0009E-999 0 -> 0
- maxx540 max -0.0001E-999 0 -> 0
-
- -- Null tests
- maxx900 max 10 # -> NaN Invalid_operation
- maxx901 max # 10 -> NaN Invalid_operation
-
-
-
-